home *** CD-ROM | disk | FTP | other *** search
/ SOHO - Exploring the Sun - 2003 Update / SOHO - Exploring the Sun - 2003 Update.iso / pc / data / main.dcr / scripts_26.ls < prev    next >
Encoding:
Text File  |  2003-02-25  |  918 b   |  36 lines

  1. on prepareFrame
  2.   global min_duration
  3.   DefCurs()
  4.   set chn to 113
  5.   if the duration of the member of sprite chn <= min_duration then
  6.     set the movieRate of sprite chn to 1
  7.   end if
  8.   if the locH of sprite 114 <> 320 then
  9.     set the puppet of sprite 114 to 1
  10.     set the locH of sprite 114 to 320
  11.     set the locV of sprite 114 to 439
  12.   end if
  13. end
  14.  
  15. on exitFrame
  16.   global dire
  17.   LiveRollOver2mask(113, 2, 113, 1)
  18.   if the locH of sprite 114 <> 320 then
  19.     set the puppet of sprite 114 to 1
  20.     set the locH of sprite 114 to 320
  21.     set the locV of sprite 114 to 439
  22.   end if
  23.   if dire = 1 then
  24.     if SpriteExists(113) > 0 then
  25.       set the directToStage of member the member of sprite 113 to 1
  26.     end if
  27.     set dire to 0
  28.   end if
  29.   if rollOver(2) or rollOver(113) then
  30.     set the member of sprite 119 to "aktiivisuus_pallo"
  31.   else
  32.     set the member of sprite 119 to "aktiivisuus"
  33.   end if
  34.   go(the frame)
  35. end
  36.